arterella (Normal User)
Rookie
Messaggi: 37
Iscritto: 14/07/2012
|
ciao ragazzi,
sono sempre io che ho bisogno di una mano
Allora, il programma funziona cosė:
estraggo i ddt dal gestionale, li elaboro e li salvo su FTP.
Quando li salvo su FTP devo dargli il nome e lo dō con questa funzione
Codice sorgente - presumibilmente VB.NET |
Private Function _GetTransportReceipAffialiateDetailFileName(ByVal AffiliateCode As String) As String Dim iCounter = My.Settings.TransportReceiptAffialiateDetailCounter + 1 Dim tName = "f_mag_rcptmag_lig_10_" & AffiliateCode & "." & iCounter.ToString("000000") & "." & Date.Now.ToBrico & ".Z" My.Settings.Save() Return tName End Function
|
Ora, siccome l'affiliateCode contiene anche il nome del negozio (TIZIO0412) non va bene, perchč io devo avere solo il numero finale (0412).
Mi ricordo che c'č un modo per dire "prendi le ultime 4 cifre" ma non ricordo qual č.
Per le date (prendi gli ultimi 3 mesi) ho usato il Take ma per questo?
|
|
HeDo (Founder Member)
Guru^2
Messaggi: 2765
Iscritto: 21/09/2007
|
|
|
arterella (Normal User)
Rookie
Messaggi: 37
Iscritto: 14/07/2012
|
Ottimo! Grazie, era proprio quello che cercavo.
ho inserito
Codice sorgente - presumibilmente VB.NET |
Public Function Substring( _ startIndex As Integer _ ) As String
|
nella classe e poi la parte di codice dove assegno il nome l'ho modoficata cosė
Codice sorgente - presumibilmente VB.NET |
Private Function _GetTransportReceipAffialiateDetailFileName(ByVal AffiliateCode As String, ByVal pxDate As Date) As String Dim iCounter = My.Settings.TransportReceiptAffialiateDetailCounter + 1 Dim tName = "f_mag_rcptmag_lig_10_" & AffiliateCode.Substring(6) & "." & iCounter.ToString("000000") & "." & pxDate.ToBrico & ".Z" My.Settings.Save() Return tName End Function
|
Pensavo erroneamente che si potesse mettere "prendi gli ultimi 4 caratteri" :P
Grazie ancora |
|
HeDo (Founder Member)
Guru^2
Messaggi: 2765
Iscritto: 21/09/2007
|
non serve inserire quel codice nella classe
č un metodo dell'oggeto builtin String
|
|